home *** CD-ROM | disk | FTP | other *** search
Text File | 1994-10-15 | 1.3 KB | 44 lines | [TEXT/KAHL] |
- //=============================================================================
- // Little Smalltalk, version 3
- // Written by Tim Budd, Oregon State University, July 1988
- //
- // Symantec Think Class Library interface code
- // ©Julian Barkway, April 1994, all rights reserved.
- //
- // CLStWindow.cp
- // -------------
- // Overridden methods from CWindow
- //=============================================================================
-
- #include "Glue.h"
- #include "CLStWindow.h"
- #include "CLStDoc.h"
- #include "CDesktop.h"
- #include "CDirector.h"
-
-
- //={OVERRIDE}======================================================================
- // Block CWindow::Close () so we can do our own window closing in Smalltalk
- //=================================================================================
- void CLStWindow::Close (void)
- {
- }
-
-
- //=================================================================================
- // Close the window and remove window object
- //=================================================================================
- void CLStWindow::Remove (void)
- {
- inherited::Close ();
- }
-
-
- //=================================================================================
- // Return a pointer to the associated document
- //=================================================================================
- CLStDoc *CLStWindow::GetDocument (void)
- {
- return itsDocument;
- }
-